#SlaveName
@RT(Lets play a game of blackjack!,I want to play a bit of blackjack!) #DT @CheckFlag(ChastityModule4Intro) @SetFlag(ChastityModule4Intro)
The rules are simple #DT
You will draw two cards #DT
Then based on the cards #DT
You have to decide if you want to stay or draw another #DT
The goal is to get as close to 21 as possible #DT
Should you get 21 you automaticly win #DT
When you choose to stay I will then draw cards until I either beat your score or I lose #DT
If we both get to 18 then I win since I'm the dealer #DT
The cards from 2 to 10 has the corresponding value #DT
So 5 of clubs has the value 5 #DT
Jacks, queens, kings and aces are special #DT
They have the corresponding value of  #DT
11, 12, 13 and 14 #DT
Unless drawing that card will 'kill' you #DT
Let me provide you with an example #DT
Say you've drawn 2 sevens then you would have the value 14 #DT
You choose to draw another card and the card you draw is a king! #DT
Normally it would then be 14 + 13 from the king #DT
But since that will kill you the king gets the value 1 instead #DT
Meaning you'll have 14 + 1 = 15 instead of 14 + 13 = 27 #DT
It's relatively simple #DT
You'll learn it or lose #GNMLol #DT
(ChastityModule4Intro)
@RT(Lets make a deal,Time for a tiny bet) #DT
@Flag(ChastityUpdate2) @RT(I will give you 150 gold,I'm gonna give you 150 gold) #DT @SetVar[TempGold]=[150]
@NotFlag(ChastityUpdate2) @RT(I will give you 75 gold,I'm gonna give you 75 gold) #DT @SetVar[TempGold]=[75]
Everytime you win you earn another 25 gold #DT
Everytime you lose I will take 50 gold from you #GNMGrin #DT
This is gonna end 3 ways #DT
1. You run out of gold #DT
2. You increase the pot to at least 200 and call 'stop' #DT @CustomMode(stop, StopTest)
@Flag(HasChastity) 3. you increase the pot to 500 gold, the game stop AND I'll unlock that #GNMCock #DT
@NotFlag(HasChastity) 3. you increase the pot to 500 gold, the game stop AND I'll let you play with that #GNMCock #DT
Lets begin! #DT @TempFlag(Busy)
(BlackJack)
You currently have @ShowVar[TempGold] gold #DT
@NullResponse @SetVar[BlackJackHand]=[0]
@NullResponse @SetVar[DealerHand]=[0]
@NullResponse @SetVar[CardsDrawn]=[0]
@NullResponse @SetVar[DealerDrawn]=[0]
(PlayerFirst)
Giving you the first card.. #DT @RapidCodeOn @Goto(1e,2e,3e,4e,5e,6e,7e,8e,9e,10e,11e,12e,13e)
(1e)
@Flag(ChastityUpdate2) @Variable[BlackJackHand]>[7] Ace @ChangeVar[BlackJackHand]=[BlackJackHand]+[1] @ShowImage[\GNMImages\Deck\1\*.jpg] @Goto(PlayerSecond)
@Flag(ChastityUpdate2) @Variable[BlackJackHand]<=[7] Ace @ChangeVar[BlackJackHand]=[BlackJackHand]+[14] @ShowImage[\GNMImages\Deck\1\*.jpg] @Goto(PlayerSecond)
@Variable[BlackJackHand]>[7] Ace @ChangeVar[BlackJackHand]=[BlackJackHand]+[1] @ShowImage[\GNMImages\Deck\a1\*.png] @Goto(PlayerSecond)
@Variable[BlackJackHand]<=[7] Ace @ChangeVar[BlackJackHand]=[BlackJackHand]+[14] @ShowImage[\GNMImages\Deck\a1\*.png] @Goto(PlayerSecond)
(2e)
@Flag(ChastityUpdate2) Two @ChangeVar[BlackJackHand]=[BlackJackHand]+[2] @ShowImage[\GNMImages\Deck\2\*.jpg] @Goto(PlayerSecond)
Two @ChangeVar[BlackJackHand]=[BlackJackHand]+[2] @ShowImage[\GNMImages\Deck\a2\*.png] @Goto(PlayerSecond)
(3e)
@Flag(ChastityUpdate2) Three @ChangeVar[BlackJackHand]=[BlackJackHand]+[3] @ShowImage[\GNMImages\Deck\3\*.jpg] @Goto(PlayerSecond)
Three @ChangeVar[BlackJackHand]=[BlackJackHand]+[3] @ShowImage[\GNMImages\Deck\a3\*.png] @Goto(PlayerSecond)
(4e)
@Flag(ChastityUpdate2) Four @ChangeVar[BlackJackHand]=[BlackJackHand]+[4] @ShowImage[\GNMImages\Deck\4\*.jpg] @Goto(PlayerSecond)
Four @ChangeVar[BlackJackHand]=[BlackJackHand]+[4] @ShowImage[\GNMImages\Deck\a4\*.png] @Goto(PlayerSecond)
(5e)
@Flag(ChastityUpdate2) Five @ChangeVar[BlackJackHand]=[BlackJackHand]+[5] @ShowImage[\GNMImages\Deck\5\*.jpg] @Goto(PlayerSecond)
Five @ChangeVar[BlackJackHand]=[BlackJackHand]+[5] @ShowImage[\GNMImages\Deck\a5\*.png] @Goto(PlayerSecond)
(6e)
@Flag(ChastityUpdate2) Six @ChangeVar[BlackJackHand]=[BlackJackHand]+[6] @ShowImage[\GNMImages\Deck\6\*.jpg] @Goto(PlayerSecond)
Six @ChangeVar[BlackJackHand]=[BlackJackHand]+[6] @ShowImage[\GNMImages\Deck\a6\*.png] @Goto(PlayerSecond)
(7e)
@Flag(ChastityUpdate2) Seven @ChangeVar[BlackJackHand]=[BlackJackHand]+[7] @ShowImage[\GNMImages\Deck\7\*.jpg] @Goto(PlayerSecond)
Seven @ChangeVar[BlackJackHand]=[BlackJackHand]+[7] @ShowImage[\GNMImages\Deck\a7\*.png] @Goto(PlayerSecond)
(8e)
@Flag(ChastityUpdate2) Eight @ChangeVar[BlackJackHand]=[BlackJackHand]+[8] @ShowImage[\GNMImages\Deck\8\*.jpg] @Goto(PlayerSecond)
Eight @ChangeVar[BlackJackHand]=[BlackJackHand]+[8] @ShowImage[\GNMImages\Deck\a8\*.png] @Goto(PlayerSecond)
(9e)
@Flag(ChastityUpdate2) Nine @ChangeVar[BlackJackHand]=[BlackJackHand]+[9] @ShowImage[\GNMImages\Deck\9\*.jpg] @Goto(PlayerSecond)
Nine @ChangeVar[BlackJackHand]=[BlackJackHand]+[9] @ShowImage[\GNMImages\Deck\a9\*.png] @Goto(PlayerSecond)
(10e)
@Flag(ChastityUpdate2) Ten @ChangeVar[BlackJackHand]=[BlackJackHand]+[10] @ShowImage[\GNMImages\Deck\10\*.jpg] @Goto(PlayerSecond)
Ten @ChangeVar[BlackJackHand]=[BlackJackHand]+[10] @ShowImage[\GNMImages\Deck\a10\*.png] @Goto(PlayerSecond)
(11e)
@Flag(ChastityUpdate2) @Variable[BlackJackHand]>[10] Jack @ChangeVar[BlackJackHand]=[BlackJackHand]+[1] @ShowImage[\GNMImages\Deck\11\*.jpg] @Goto(PlayerSecond)
@Flag(ChastityUpdate2) @Variable[BlackJackHand]<=[10] Jack @ChangeVar[BlackJackHand]=[BlackJackHand]+[11] @ShowImage[\GNMImages\Deck\11\*.jpg] @Goto(PlayerSecond)
@Variable[BlackJackHand]>[10] Jack @ChangeVar[BlackJackHand]=[BlackJackHand]+[1] @ShowImage[\GNMImages\Deck\a11\*.png] @Goto(PlayerSecond)
@Variable[BlackJackHand]<=[10] Jack @ChangeVar[BlackJackHand]=[BlackJackHand]+[11] @ShowImage[\GNMImages\Deck\a11\*.png] @Goto(PlayerSecond)
(12e)
@Flag(ChastityUpdate2) @Variable[BlackJackHand]>[9] Queen @ChangeVar[BlackJackHand]=[BlackJackHand]+[1] @ShowImage[\GNMImages\Deck\12\*.jpg] @Goto(PlayerSecond)
@Flag(ChastityUpdate2) @Variable[BlackJackHand]<=[9] Queen @ChangeVar[BlackJackHand]=[BlackJackHand]+[12] @ShowImage[\GNMImages\Deck\12\*.jpg] @Goto(PlayerSecond)
@Variable[BlackJackHand]>[9] Queen @ChangeVar[BlackJackHand]=[BlackJackHand]+[1] @ShowImage[\GNMImages\Deck\a12\*.png] @Goto(PlayerSecond)
@Variable[BlackJackHand]<=[9] Queen @ChangeVar[BlackJackHand]=[BlackJackHand]+[12] @ShowImage[\GNMImages\Deck\a12\*.png] @Goto(PlayerSecond)
(13e)
@Flag(ChastityUpdate2) @Variable[BlackJackHand]>[8] King @ChangeVar[BlackJackHand]=[BlackJackHand]+[1] @ShowImage[\GNMImages\Deck\13\*.jpg] @Goto(PlayerSecond)
@Flag(ChastityUpdate2) @Variable[BlackJackHand]<=[8] King @ChangeVar[BlackJackHand]=[BlackJackHand]+[13] @ShowImage[\GNMImages\Deck\13\*.jpg] @Goto(PlayerSecond)
@Variable[BlackJackHand]>[8] King @ChangeVar[BlackJackHand]=[BlackJackHand]+[1] @ShowImage[\GNMImages\Deck\a13\*.png] @Goto(PlayerSecond)
@Variable[BlackJackHand]<=[8] King @ChangeVar[BlackJackHand]=[BlackJackHand]+[13] @ShowImage[\GNMImages\Deck\a13\*.png] @Goto(PlayerSecond)
(PlayerSecond)
Giving you the second card.. #DT @Goto(1f,2f,3f,4f,5f,6f,7f,8f,9f,10f,11f,12f,13f)
(1f)
@Flag(ChastityUpdate2) @Variable[BlackJackHand]>[7] Ace @ChangeVar[BlackJackHand]=[BlackJackHand]+[1] @ShowImage[\GNMImages\Deck\1\*.jpg] @Goto(Or)
@Flag(ChastityUpdate2) @Variable[BlackJackHand]<=[7] Ace @ChangeVar[BlackJackHand]=[BlackJackHand]+[14] @ShowImage[\GNMImages\Deck\1\*.jpg] @Goto(Or)
@Variable[BlackJackHand]>[7] Ace @ChangeVar[BlackJackHand]=[BlackJackHand]+[1] @ShowImage[\GNMImages\Deck\a1\*.png] @Goto(Or)
@Variable[BlackJackHand]<=[7] Ace @ChangeVar[BlackJackHand]=[BlackJackHand]+[14] @ShowImage[\GNMImages\Deck\a1\*.png] @Goto(Or)
(2f)
@Flag(ChastityUpdate2) Two @ChangeVar[BlackJackHand]=[BlackJackHand]+[2] @ShowImage[\GNMImages\Deck\2\*.jpg] @Goto(Or)
Two @ChangeVar[BlackJackHand]=[BlackJackHand]+[2] @ShowImage[\GNMImages\Deck\a2\*.png] @Goto(Or)
(3f)
@Flag(ChastityUpdate2) Three @ChangeVar[BlackJackHand]=[BlackJackHand]+[3] @ShowImage[\GNMImages\Deck\3\*.jpg] @Goto(Or)
Three @ChangeVar[BlackJackHand]=[BlackJackHand]+[3] @ShowImage[\GNMImages\Deck\a3\*.png] @Goto(Or)
(4f)
@Flag(ChastityUpdate2) Four @ChangeVar[BlackJackHand]=[BlackJackHand]+[4] @ShowImage[\GNMImages\Deck\4\*.jpg] @Goto(Or)
Four @ChangeVar[BlackJackHand]=[BlackJackHand]+[4] @ShowImage[\GNMImages\Deck\a4\*.png] @Goto(Or)
(5f)
@Flag(ChastityUpdate2) Five @ChangeVar[BlackJackHand]=[BlackJackHand]+[5] @ShowImage[\GNMImages\Deck\5\*.jpg] @Goto(Or)
Five @ChangeVar[BlackJackHand]=[BlackJackHand]+[5] @ShowImage[\GNMImages\Deck\a5\*.png] @Goto(Or)
(6f)
@Flag(ChastityUpdate2) Six @ChangeVar[BlackJackHand]=[BlackJackHand]+[6] @ShowImage[\GNMImages\Deck\6\*.jpg] @Goto(Or)
Six @ChangeVar[BlackJackHand]=[BlackJackHand]+[6] @ShowImage[\GNMImages\Deck\a6\*.png] @Goto(Or)
(7f)
@Flag(ChastityUpdate2) Seven @ChangeVar[BlackJackHand]=[BlackJackHand]+[7] @ShowImage[\GNMImages\Deck\7\*.jpg] @Goto(Or)
Seven @ChangeVar[BlackJackHand]=[BlackJackHand]+[7] @ShowImage[\GNMImages\Deck\a7\*.png] @Goto(Or)
(8f)
@Flag(ChastityUpdate2) Eight @ChangeVar[BlackJackHand]=[BlackJackHand]+[8] @ShowImage[\GNMImages\Deck\8\*.jpg] @Goto(Or)
Eight @ChangeVar[BlackJackHand]=[BlackJackHand]+[8] @ShowImage[\GNMImages\Deck\a8\*.png] @Goto(Or)
(9f)
@Flag(ChastityUpdate2) Nine @ChangeVar[BlackJackHand]=[BlackJackHand]+[9] @ShowImage[\GNMImages\Deck\9\*.jpg] @Goto(Or)
Nine @ChangeVar[BlackJackHand]=[BlackJackHand]+[9] @ShowImage[\GNMImages\Deck\a9\*.png] @Goto(Or)
(10f)
@Flag(ChastityUpdate2) Ten @ChangeVar[BlackJackHand]=[BlackJackHand]+[10] @ShowImage[\GNMImages\Deck\10\*.jpg] @Goto(Or)
Ten @ChangeVar[BlackJackHand]=[BlackJackHand]+[10] @ShowImage[\GNMImages\Deck\a10\*.png] @Goto(Or)
(11f)
@Flag(ChastityUpdate2) @Variable[BlackJackHand]>[10] Jack @ChangeVar[BlackJackHand]=[BlackJackHand]+[1] @ShowImage[\GNMImages\Deck\11\*.jpg] @Goto(Or)
@Flag(ChastityUpdate2) @Variable[BlackJackHand]<=[10] Jack @ChangeVar[BlackJackHand]=[BlackJackHand]+[11] @ShowImage[\GNMImages\Deck\11\*.jpg] @Goto(Or)
@Variable[BlackJackHand]>[10] Jack @ChangeVar[BlackJackHand]=[BlackJackHand]+[1] @ShowImage[\GNMImages\Deck\a11\*.png] @Goto(Or)
@Variable[BlackJackHand]<=[10] Jack @ChangeVar[BlackJackHand]=[BlackJackHand]+[11] @ShowImage[\GNMImages\Deck\a11\*.png] @Goto(Or)
(12f)
@Flag(ChastityUpdate2) @Variable[BlackJackHand]>[9] Queen @ChangeVar[BlackJackHand]=[BlackJackHand]+[1] @ShowImage[\GNMImages\Deck\12\*.jpg] @Goto(Or)
@Flag(ChastityUpdate2) @Variable[BlackJackHand]<=[9] Queen @ChangeVar[BlackJackHand]=[BlackJackHand]+[12] @ShowImage[\GNMImages\Deck\12\*.jpg] @Goto(Or)
@Variable[BlackJackHand]>[9] Queen @ChangeVar[BlackJackHand]=[BlackJackHand]+[1] @ShowImage[\GNMImages\Deck\a12\*.png] @Goto(Or)
@Variable[BlackJackHand]<=[9] Queen @ChangeVar[BlackJackHand]=[BlackJackHand]+[12] @ShowImage[\GNMImages\Deck\a12\*.png] @Goto(Or)
(13f)
@Flag(ChastityUpdate2) @Variable[BlackJackHand]>[8] King @ChangeVar[BlackJackHand]=[BlackJackHand]+[1] @ShowImage[\GNMImages\Deck\13\*.jpg] @Goto(Or)
@Flag(ChastityUpdate2) @Variable[BlackJackHand]<=[8] King @ChangeVar[BlackJackHand]=[BlackJackHand]+[13] @ShowImage[\GNMImages\Deck\13\*.jpg] @Goto(Or)
@Variable[BlackJackHand]>[8] King @ChangeVar[BlackJackHand]=[BlackJackHand]+[1] @ShowImage[\GNMImages\Deck\a13\*.png] @Goto(Or)
@Variable[BlackJackHand]<=[8] King @ChangeVar[BlackJackHand]=[BlackJackHand]+[13] @ShowImage[\GNMImages\Deck\a13\*.png] @Goto(Or)
(Or)
@NullResponse @If[BlackJackHand]>[21]Then(Lose)
@NullResponse @If[BlackJackHand]=[21]Then(Win)
You have @ShowVar[BlackJackHand]
Draw or stay? #DT
[draw]@NullResponse @Goto(Draw)
[stay]@NullResponse @Goto(DealerFirst)
@DifferentAnswer Draw or stay? #DT
(Draw)
@NullResponse @Goto(1a,2a,3a,4a,5a,6a,7a,8a,9a,10a,11a,12a,13a)
(1a)
@Flag(ChastityUpdate2) @Variable[BlackJackHand]>[7] Ace @ChangeVar[BlackJackHand]=[BlackJackHand]+[1] @ShowImage[\GNMImages\Deck\1\*.jpg] @Goto(Or)
@Flag(ChastityUpdate2) @Variable[BlackJackHand]<=[7] Ace @ChangeVar[BlackJackHand]=[BlackJackHand]+[14] @ShowImage[\GNMImages\Deck\1\*.jpg] @Goto(Or)
@Variable[BlackJackHand]>[7] Ace @ChangeVar[BlackJackHand]=[BlackJackHand]+[1] @ShowImage[\GNMImages\Deck\a1\*.png] @Goto(Or)
@Variable[BlackJackHand]<=[7] Ace @ChangeVar[BlackJackHand]=[BlackJackHand]+[14] @ShowImage[\GNMImages\Deck\a1\*.png] @Goto(Or)
(2a)
@Flag(ChastityUpdate2) Two @ChangeVar[BlackJackHand]=[BlackJackHand]+[2] @ShowImage[\GNMImages\Deck\2\*.jpg] @Goto(Or)
Two @ChangeVar[BlackJackHand]=[BlackJackHand]+[2] @ShowImage[\GNMImages\Deck\a2\*.png] @Goto(Or)
(3a)
@Flag(ChastityUpdate2) Three @ChangeVar[BlackJackHand]=[BlackJackHand]+[3] @ShowImage[\GNMImages\Deck\3\*.jpg] @Goto(Or)
Three @ChangeVar[BlackJackHand]=[BlackJackHand]+[3] @ShowImage[\GNMImages\Deck\a3\*.png] @Goto(Or)
(4a)
@Flag(ChastityUpdate2) Four @ChangeVar[BlackJackHand]=[BlackJackHand]+[4] @ShowImage[\GNMImages\Deck\4\*.jpg] @Goto(Or)
Four @ChangeVar[BlackJackHand]=[BlackJackHand]+[4] @ShowImage[\GNMImages\Deck\a4\*.png] @Goto(Or)
(5a)
@Flag(ChastityUpdate2) Five @ChangeVar[BlackJackHand]=[BlackJackHand]+[5] @ShowImage[\GNMImages\Deck\5\*.jpg] @Goto(Or)
Five @ChangeVar[BlackJackHand]=[BlackJackHand]+[5] @ShowImage[\GNMImages\Deck\a5\*.png] @Goto(Or)
(6a)
@Flag(ChastityUpdate2) Six @ChangeVar[BlackJackHand]=[BlackJackHand]+[6] @ShowImage[\GNMImages\Deck\6\*.jpg] @Goto(Or)
Six @ChangeVar[BlackJackHand]=[BlackJackHand]+[6] @ShowImage[\GNMImages\Deck\a6\*.png] @Goto(Or)
(7a)
@Flag(ChastityUpdate2) Seven @ChangeVar[BlackJackHand]=[BlackJackHand]+[7] @ShowImage[\GNMImages\Deck\7\*.jpg] @Goto(Or)
Seven @ChangeVar[BlackJackHand]=[BlackJackHand]+[7] @ShowImage[\GNMImages\Deck\a7\*.png] @Goto(Or)
(8a)
@Flag(ChastityUpdate2) Eight @ChangeVar[BlackJackHand]=[BlackJackHand]+[8] @ShowImage[\GNMImages\Deck\8\*.jpg] @Goto(Or)
Eight @ChangeVar[BlackJackHand]=[BlackJackHand]+[8] @ShowImage[\GNMImages\Deck\a8\*.png] @Goto(Or)
(9a)
@Flag(ChastityUpdate2) Nine @ChangeVar[BlackJackHand]=[BlackJackHand]+[9] @ShowImage[\GNMImages\Deck\9\*.jpg] @Goto(Or)
Nine @ChangeVar[BlackJackHand]=[BlackJackHand]+[9] @ShowImage[\GNMImages\Deck\a9\*.png] @Goto(Or)
(10a)
@Flag(ChastityUpdate2) Ten @ChangeVar[BlackJackHand]=[BlackJackHand]+[10] @ShowImage[\GNMImages\Deck\10\*.jpg] @Goto(Or)
Ten @ChangeVar[BlackJackHand]=[BlackJackHand]+[10] @ShowImage[\GNMImages\Deck\a10\*.png] @Goto(Or)
(11a)
@Flag(ChastityUpdate2) @Variable[BlackJackHand]>[10] Jack @ChangeVar[BlackJackHand]=[BlackJackHand]+[1] @ShowImage[\GNMImages\Deck\11\*.jpg] @Goto(Or)
@Flag(ChastityUpdate2) @Variable[BlackJackHand]<=[10] Jack @ChangeVar[BlackJackHand]=[BlackJackHand]+[11] @ShowImage[\GNMImages\Deck\11\*.jpg] @Goto(Or)
@Variable[BlackJackHand]>[10] Jack @ChangeVar[BlackJackHand]=[BlackJackHand]+[1] @ShowImage[\GNMImages\Deck\a11\*.png] @Goto(Or)
@Variable[BlackJackHand]<=[10] Jack @ChangeVar[BlackJackHand]=[BlackJackHand]+[11] @ShowImage[\GNMImages\Deck\a11\*.png] @Goto(Or)
(12a)
@Flag(ChastityUpdate2) @Variable[BlackJackHand]>[9] Queen @ChangeVar[BlackJackHand]=[BlackJackHand]+[1] @ShowImage[\GNMImages\Deck\12\*.jpg] @Goto(Or)
@Flag(ChastityUpdate2) @Variable[BlackJackHand]<=[9] Queen @ChangeVar[BlackJackHand]=[BlackJackHand]+[12] @ShowImage[\GNMImages\Deck\12\*.jpg] @Goto(Or)
@Variable[BlackJackHand]>[9] Queen @ChangeVar[BlackJackHand]=[BlackJackHand]+[1] @ShowImage[\GNMImages\Deck\a12\*.png] @Goto(Or)
@Variable[BlackJackHand]<=[9] Queen @ChangeVar[BlackJackHand]=[BlackJackHand]+[12] @ShowImage[\GNMImages\Deck\a12\*.png] @Goto(Or)
(13a)
@Flag(ChastityUpdate2) @Variable[BlackJackHand]>[8] King @ChangeVar[BlackJackHand]=[BlackJackHand]+[1] @ShowImage[\GNMImages\Deck\13\*.jpg] @Goto(Or)
@Flag(ChastityUpdate2) @Variable[BlackJackHand]<=[8] King @ChangeVar[BlackJackHand]=[BlackJackHand]+[13] @ShowImage[\GNMImages\Deck\13\*.jpg] @Goto(Or)
@Variable[BlackJackHand]>[8] King @ChangeVar[BlackJackHand]=[BlackJackHand]+[1] @ShowImage[\GNMImages\Deck\a13\*.png] @Goto(Or)
@Variable[BlackJackHand]<=[8] King @ChangeVar[BlackJackHand]=[BlackJackHand]+[13] @ShowImage[\GNMImages\Deck\a13\*.png] @Goto(Or)
(DealerFirst)
Drawing first card.. #DT @Goto(1d,2d,3d,4d,5d,6d,7d,8d,9d,10d,11d,12d,13d)
(1d)
@Flag(ChastityUpdate2) @Variable[DealerHand]>[7] Ace @ChangeVar[DealerHand]=[DealerHand]+[1] @ShowImage[\GNMImages\Deck\1\*.jpg] @Goto(DealerSecond)
@Flag(ChastityUpdate2) @Variable[DealerHand]<=[7] Ace @ChangeVar[DealerHand]=[DealerHand]+[14] @ShowImage[\GNMImages\Deck\1\*.jpg] @Goto(DealerSecond)
@Variable[DealerHand]>[7] Ace @ChangeVar[DealerHand]=[DealerHand]+[1] @ShowImage[\GNMImages\Deck\a1\*.png] @Goto(DealerSecond)
@Variable[DealerHand]<=[7] Ace @ChangeVar[DealerHand]=[DealerHand]+[14] @ShowImage[\GNMImages\Deck\a1\*.png] @Goto(DealerSecond)
(2d)
@Flag(ChastityUpdate2) Two @ChangeVar[DealerHand]=[DealerHand]+[2] @ShowImage[\GNMImages\Deck\2\*.jpg] @Goto(DealerSecond)
Two @ChangeVar[DealerHand]=[DealerHand]+[2] @ShowImage[\GNMImages\Deck\a2\*.png] @Goto(DealerSecond)
(3d)
@Flag(ChastityUpdate2) Three @ChangeVar[DealerHand]=[DealerHand]+[3] @ShowImage[\GNMImages\Deck\3\*.jpg] @Goto(DealerSecond)
Three @ChangeVar[DealerHand]=[DealerHand]+[3] @ShowImage[\GNMImages\Deck\a3\*.png] @Goto(DealerSecond)
(4d)
@Flag(ChastityUpdate2) Four @ChangeVar[DealerHand]=[DealerHand]+[4] @ShowImage[\GNMImages\Deck\4\*.jpg] @Goto(DealerSecond)
Four @ChangeVar[DealerHand]=[DealerHand]+[4] @ShowImage[\GNMImages\Deck\a4\*.png] @Goto(DealerSecond)
(5d)
@Flag(ChastityUpdate2) Five @ChangeVar[DealerHand]=[DealerHand]+[5] @ShowImage[\GNMImages\Deck\5\*.jpg] @Goto(DealerSecond)
Five @ChangeVar[DealerHand]=[DealerHand]+[5] @ShowImage[\GNMImages\Deck\a5\*.png] @Goto(DealerSecond)
(6d)
@Flag(ChastityUpdate2) Six @ChangeVar[DealerHand]=[DealerHand]+[6] @ShowImage[\GNMImages\Deck\6\*.jpg] @Goto(DealerSecond)
Six @ChangeVar[DealerHand]=[DealerHand]+[6] @ShowImage[\GNMImages\Deck\a6\*.png] @Goto(DealerSecond)
(7d)
@Flag(ChastityUpdate2) Seven @ChangeVar[DealerHand]=[DealerHand]+[7] @ShowImage[\GNMImages\Deck\7\*.jpg] @Goto(DealerSecond)
Seven @ChangeVar[DealerHand]=[DealerHand]+[7] @ShowImage[\GNMImages\Deck\a7\*.png] @Goto(DealerSecond)
(8d)
@Flag(ChastityUpdate2) Eight @ChangeVar[DealerHand]=[DealerHand]+[8] @ShowImage[\GNMImages\Deck\8\*.jpg] @Goto(DealerSecond)
Eight @ChangeVar[DealerHand]=[DealerHand]+[8] @ShowImage[\GNMImages\Deck\a8\*.png] @Goto(DealerSecond)
(9d)
@Flag(ChastityUpdate2) Nine @ChangeVar[DealerHand]=[DealerHand]+[9] @ShowImage[\GNMImages\Deck\9\*.jpg] @Goto(DealerSecond)
Nine @ChangeVar[DealerHand]=[DealerHand]+[9] @ShowImage[\GNMImages\Deck\a9\*.png] @Goto(DealerSecond)
(10d)
@Flag(ChastityUpdate2) Ten @ChangeVar[DealerHand]=[DealerHand]+[10] @ShowImage[\GNMImages\Deck\10\*.jpg] @Goto(DealerSecond)
Ten @ChangeVar[DealerHand]=[DealerHand]+[10] @ShowImage[\GNMImages\Deck\a10\*.png] @Goto(DealerSecond)
(11d)
@Flag(ChastityUpdate2) @Variable[DealerHand]>[10] Jack @ChangeVar[DealerHand]=[DealerHand]+[1] @ShowImage[\GNMImages\Deck\11\*.jpg] @Goto(DealerSecond)
@Flag(ChastityUpdate2) @Variable[DealerHand]<=[10] Jack @ChangeVar[DealerHand]=[DealerHand]+[11] @ShowImage[\GNMImages\Deck\11\*.jpg] @Goto(DealerSecond)
@Variable[DealerHand]>[10] Jack @ChangeVar[DealerHand]=[DealerHand]+[1] @ShowImage[\GNMImages\Deck\a11\*.png] @Goto(DealerSecond)
@Variable[DealerHand]<=[10] Jack @ChangeVar[DealerHand]=[DealerHand]+[11] @ShowImage[\GNMImages\Deck\a11\*.png] @Goto(DealerSecond)
(12d)
@Flag(ChastityUpdate2) @Variable[DealerHand]>[9] Queen @ChangeVar[DealerHand]=[DealerHand]+[1] @ShowImage[\GNMImages\Deck\12\*.jpg] @Goto(DealerSecond)
@Flag(ChastityUpdate2) @Variable[DealerHand]<=[9] Queen @ChangeVar[DealerHand]=[DealerHand]+[12] @ShowImage[\GNMImages\Deck\12\*.jpg] @Goto(DealerSecond)
@Variable[DealerHand]>[9] Queen @ChangeVar[DealerHand]=[DealerHand]+[1] @ShowImage[\GNMImages\Deck\a12\*.png] @Goto(DealerSecond)
@Variable[DealerHand]<=[9] Queen @ChangeVar[DealerHand]=[DealerHand]+[12] @ShowImage[\GNMImages\Deck\a12\*.png] @Goto(DealerSecond)
(13d)
@Flag(ChastityUpdate2) @Variable[DealerHand]>[8] King @ChangeVar[DealerHand]=[DealerHand]+[1] @ShowImage[\GNMImages\Deck\13\*.jpg] @Goto(DealerSecond)
@Flag(ChastityUpdate2) @Variable[DealerHand]<=[8] King @ChangeVar[DealerHand]=[DealerHand]+[13] @ShowImage[\GNMImages\Deck\13\*.jpg] @Goto(DealerSecond)
@Variable[DealerHand]>[8] King @ChangeVar[DealerHand]=[DealerHand]+[1] @ShowImage[\GNMImages\Deck\a13\*.png] @Goto(DealerSecond)
@Variable[DealerHand]<=[8] King @ChangeVar[DealerHand]=[DealerHand]+[13] @ShowImage[\GNMImages\Deck\a13\*.png] @Goto(DealerSecond)
(DealerSecond)
Drawing second card.. #DT @Goto(1c,2c,3c,4c,5c,6c,7c,8c,9c,10c,11c,12c,13c)
(1c)
@Flag(ChastityUpdate2) @Variable[DealerHand]>[7] Ace @ChangeVar[DealerHand]=[DealerHand]+[1] @ShowImage[\GNMImages\Deck\1\*.jpg] @Goto(Dealer)
@Flag(ChastityUpdate2) @Variable[DealerHand]<=[7] Ace @ChangeVar[DealerHand]=[DealerHand]+[14] @ShowImage[\GNMImages\Deck\1\*.jpg] @Goto(Dealer)
@Variable[DealerHand]>[7] Ace @ChangeVar[DealerHand]=[DealerHand]+[1] @ShowImage[\GNMImages\Deck\a1\*.png] @Goto(Dealer)
@Variable[DealerHand]<=[7] Ace @ChangeVar[DealerHand]=[DealerHand]+[14] @ShowImage[\GNMImages\Deck\a1\*.png] @Goto(Dealer)
(2c)
@Flag(ChastityUpdate2) Two @ChangeVar[DealerHand]=[DealerHand]+[2] @ShowImage[\GNMImages\Deck\2\*.jpg] @Goto(Dealer)
Two @ChangeVar[DealerHand]=[DealerHand]+[2] @ShowImage[\GNMImages\Deck\a2\*.png] @Goto(Dealer)
(3c)
@Flag(ChastityUpdate2) Three @ChangeVar[DealerHand]=[DealerHand]+[3] @ShowImage[\GNMImages\Deck\3\*.jpg] @Goto(Dealer)
Three @ChangeVar[DealerHand]=[DealerHand]+[3] @ShowImage[\GNMImages\Deck\a3\*.png] @Goto(Dealer)
(4c)
@Flag(ChastityUpdate2) Four @ChangeVar[DealerHand]=[DealerHand]+[4] @ShowImage[\GNMImages\Deck\4\*.jpg] @Goto(Dealer)
Four @ChangeVar[DealerHand]=[DealerHand]+[4] @ShowImage[\GNMImages\Deck\a4\*.png] @Goto(Dealer)
(5c)
@Flag(ChastityUpdate2) Five @ChangeVar[DealerHand]=[DealerHand]+[5] @ShowImage[\GNMImages\Deck\5\*.jpg] @Goto(Dealer)
Five @ChangeVar[DealerHand]=[DealerHand]+[5] @ShowImage[\GNMImages\Deck\a5\*.png] @Goto(Dealer)
(6c)
@Flag(ChastityUpdate2) Six @ChangeVar[DealerHand]=[DealerHand]+[6] @ShowImage[\GNMImages\Deck\6\*.jpg] @Goto(Dealer)
Six @ChangeVar[DealerHand]=[DealerHand]+[6] @ShowImage[\GNMImages\Deck\a6\*.png] @Goto(Dealer)
(7c)
@Flag(ChastityUpdate2) Seven @ChangeVar[DealerHand]=[DealerHand]+[7] @ShowImage[\GNMImages\Deck\7\*.jpg] @Goto(Dealer)
Seven @ChangeVar[DealerHand]=[DealerHand]+[7] @ShowImage[\GNMImages\Deck\a7\*.png] @Goto(Dealer)
(8c)
@Flag(ChastityUpdate2) Eight @ChangeVar[DealerHand]=[DealerHand]+[8] @ShowImage[\GNMImages\Deck\8\*.jpg] @Goto(Dealer)
Eight @ChangeVar[DealerHand]=[DealerHand]+[8] @ShowImage[\GNMImages\Deck\a8\*.png] @Goto(Dealer)
(9c)
@Flag(ChastityUpdate2) Nine @ChangeVar[DealerHand]=[DealerHand]+[9] @ShowImage[\GNMImages\Deck\9\*.jpg] @Goto(Dealer)
Nine @ChangeVar[DealerHand]=[DealerHand]+[9] @ShowImage[\GNMImages\Deck\a9\*.png] @Goto(Dealer)
(10c)
@Flag(ChastityUpdate2) Ten @ChangeVar[DealerHand]=[DealerHand]+[10] @ShowImage[\GNMImages\Deck\10\*.jpg] @Goto(Dealer)
Ten @ChangeVar[DealerHand]=[DealerHand]+[10] @ShowImage[\GNMImages\Deck\a10\*.png] @Goto(Dealer)
(11c)
@Flag(ChastityUpdate2) @Variable[DealerHand]>[10] Jack @ChangeVar[DealerHand]=[DealerHand]+[1] @ShowImage[\GNMImages\Deck\11\*.jpg] @Goto(Dealer)
@Flag(ChastityUpdate2) @Variable[DealerHand]<=[10] Jack @ChangeVar[DealerHand]=[DealerHand]+[11] @ShowImage[\GNMImages\Deck\11\*.jpg] @Goto(Dealer)
@Variable[DealerHand]>[10] Jack @ChangeVar[DealerHand]=[DealerHand]+[1] @ShowImage[\GNMImages\Deck\a11\*.png] @Goto(Dealer)
@Variable[DealerHand]<=[10] Jack @ChangeVar[DealerHand]=[DealerHand]+[11] @ShowImage[\GNMImages\Deck\a11\*.png] @Goto(Dealer)
(12c)
@Flag(ChastityUpdate2) @Variable[DealerHand]>[9] Queen @ChangeVar[DealerHand]=[DealerHand]+[1] @ShowImage[\GNMImages\Deck\12\*.jpg] @Goto(Dealer)
@Flag(ChastityUpdate2) @Variable[DealerHand]<=[9] Queen @ChangeVar[DealerHand]=[DealerHand]+[12] @ShowImage[\GNMImages\Deck\12\*.jpg] @Goto(Dealer)
@Variable[DealerHand]>[9] Queen @ChangeVar[DealerHand]=[DealerHand]+[1] @ShowImage[\GNMImages\Deck\a12\*.png] @Goto(Dealer)
@Variable[DealerHand]<=[9] Queen @ChangeVar[DealerHand]=[DealerHand]+[12] @ShowImage[\GNMImages\Deck\a12\*.png] @Goto(Dealer)
(13c)
@Flag(ChastityUpdate2) @Variable[DealerHand]>[8] King @ChangeVar[DealerHand]=[DealerHand]+[1] @ShowImage[\GNMImages\Deck\13\*.jpg] @Goto(Dealer)
@Flag(ChastityUpdate2) @Variable[DealerHand]<=[8] King @ChangeVar[DealerHand]=[DealerHand]+[13] @ShowImage[\GNMImages\Deck\13\*.jpg] @Goto(Dealer)
@Variable[DealerHand]>[8] King @ChangeVar[DealerHand]=[DealerHand]+[1] @ShowImage[\GNMImages\Deck\a13\*.png] @Goto(Dealer)
@Variable[DealerHand]<=[8] King @ChangeVar[DealerHand]=[DealerHand]+[13] @ShowImage[\GNMImages\Deck\a13\*.png] @Goto(Dealer)
(Dealer)
@NullResponse @If[DealerHand]>[21]Then(DealerLost)
@NullResponse @If[DealerHand]>=[BlackJackHand]Then(DealerWin)
@NullResponse @Goto(1b,2b,3b,4b,5b,6b,7b,8b,9b,10b,11b,12b,13b)
(1b)
@Flag(ChastityUpdate2) @Variable[DealerHand]>[7] Ace @ChangeVar[DealerHand]=[DealerHand]+[1] @ShowImage[\GNMImages\Deck\1\*.jpg] @Goto(Dealer)
@Flag(ChastityUpdate2) @Variable[DealerHand]<=[7] Ace @ChangeVar[DealerHand]=[DealerHand]+[14] @ShowImage[\GNMImages\Deck\1\*.jpg] @Goto(Dealer)
@Variable[DealerHand]>[7] Ace @ChangeVar[DealerHand]=[DealerHand]+[1] @ShowImage[\GNMImages\Deck\a1\*.png] @Goto(Dealer)
@Variable[DealerHand]<=[7] Ace @ChangeVar[DealerHand]=[DealerHand]+[14] @ShowImage[\GNMImages\Deck\a1\*.png] @Goto(Dealer)
(2b)
@Flag(ChastityUpdate2) Two @ChangeVar[DealerHand]=[DealerHand]+[2] @ShowImage[\GNMImages\Deck\2\*.jpg] @Goto(Dealer)
Two @ChangeVar[DealerHand]=[DealerHand]+[2] @ShowImage[\GNMImages\Deck\a2\*.png] @Goto(Dealer)
(3b)
@Flag(ChastityUpdate2) Three @ChangeVar[DealerHand]=[DealerHand]+[3] @ShowImage[\GNMImages\Deck\3\*.jpg] @Goto(Dealer)
Three @ChangeVar[DealerHand]=[DealerHand]+[3] @ShowImage[\GNMImages\Deck\a3\*.png] @Goto(Dealer)
(4b)
@Flag(ChastityUpdate2) Four @ChangeVar[DealerHand]=[DealerHand]+[4] @ShowImage[\GNMImages\Deck\4\*.jpg] @Goto(Dealer)
Four @ChangeVar[DealerHand]=[DealerHand]+[4] @ShowImage[\GNMImages\Deck\a4\*.png] @Goto(Dealer)
(5b)
@Flag(ChastityUpdate2) Five @ChangeVar[DealerHand]=[DealerHand]+[5] @ShowImage[\GNMImages\Deck\5\*.jpg] @Goto(Dealer)
Five @ChangeVar[DealerHand]=[DealerHand]+[5] @ShowImage[\GNMImages\Deck\a5\*.png] @Goto(Dealer)
(6b)
@Flag(ChastityUpdate2) Six @ChangeVar[DealerHand]=[DealerHand]+[6] @ShowImage[\GNMImages\Deck\6\*.jpg] @Goto(Dealer)
Six @ChangeVar[DealerHand]=[DealerHand]+[6] @ShowImage[\GNMImages\Deck\a6\*.png] @Goto(Dealer)
(7b)
@Flag(ChastityUpdate2) Seven @ChangeVar[DealerHand]=[DealerHand]+[7] @ShowImage[\GNMImages\Deck\7\*.jpg] @Goto(Dealer)
Seven @ChangeVar[DealerHand]=[DealerHand]+[7] @ShowImage[\GNMImages\Deck\a7\*.png] @Goto(Dealer)
(8b)
@Flag(ChastityUpdate2) Eight @ChangeVar[DealerHand]=[DealerHand]+[8] @ShowImage[\GNMImages\Deck\8\*.jpg] @Goto(Dealer)
Eight @ChangeVar[DealerHand]=[DealerHand]+[8] @ShowImage[\GNMImages\Deck\a8\*.png] @Goto(Dealer)
(9b)
@Flag(ChastityUpdate2) Nine @ChangeVar[DealerHand]=[DealerHand]+[9] @ShowImage[\GNMImages\Deck\9\*.jpg] @Goto(Dealer)
Nine @ChangeVar[DealerHand]=[DealerHand]+[9] @ShowImage[\GNMImages\Deck\a9\*.png] @Goto(Dealer)
(10b)
@Flag(ChastityUpdate2) Ten @ChangeVar[DealerHand]=[DealerHand]+[10] @ShowImage[\GNMImages\Deck\10\*.jpg] @Goto(Dealer)
Ten @ChangeVar[DealerHand]=[DealerHand]+[10] @ShowImage[\GNMImages\Deck\a10\*.png] @Goto(Dealer)
(11b)
@Flag(ChastityUpdate2) @Variable[DealerHand]>[10] Jack @ChangeVar[DealerHand]=[DealerHand]+[1] @ShowImage[\GNMImages\Deck\11\*.jpg] @Goto(Dealer)
@Flag(ChastityUpdate2) @Variable[DealerHand]<=[10] Jack @ChangeVar[DealerHand]=[DealerHand]+[11] @ShowImage[\GNMImages\Deck\11\*.jpg] @Goto(Dealer)
@Variable[DealerHand]>[10] Jack @ChangeVar[DealerHand]=[DealerHand]+[1] @ShowImage[\GNMImages\Deck\a11\*.png] @Goto(Dealer)
@Variable[DealerHand]<=[10] Jack @ChangeVar[DealerHand]=[DealerHand]+[11] @ShowImage[\GNMImages\Deck\a11\*.png] @Goto(Dealer)
(12b)
@Flag(ChastityUpdate2) @Variable[DealerHand]>[9] Queen @ChangeVar[DealerHand]=[DealerHand]+[1] @ShowImage[\GNMImages\Deck\12\*.jpg] @Goto(Dealer)
@Flag(ChastityUpdate2) @Variable[DealerHand]<=[9] Queen @ChangeVar[DealerHand]=[DealerHand]+[12] @ShowImage[\GNMImages\Deck\12\*.jpg] @Goto(Dealer)
@Variable[DealerHand]>[9] Queen @ChangeVar[DealerHand]=[DealerHand]+[1] @ShowImage[\GNMImages\Deck\a12\*.png] @Goto(Dealer)
@Variable[DealerHand]<=[9] Queen @ChangeVar[DealerHand]=[DealerHand]+[12] @ShowImage[\GNMImages\Deck\a12\*.png] @Goto(Dealer)
(13b)
@Flag(ChastityUpdate2) @Variable[DealerHand]>[8] King @ChangeVar[DealerHand]=[DealerHand]+[1] @ShowImage[\GNMImages\Deck\13\*.jpg] @Goto(Dealer)
@Flag(ChastityUpdate2) @Variable[DealerHand]<=[8] King @ChangeVar[DealerHand]=[DealerHand]+[13] @ShowImage[\GNMImages\Deck\13\*.jpg] @Goto(Dealer)
@Variable[DealerHand]>[8] King @ChangeVar[DealerHand]=[DealerHand]+[1] @ShowImage[\GNMImages\Deck\a13\*.png] @Goto(Dealer)
@Variable[DealerHand]<=[8] King @ChangeVar[DealerHand]=[DealerHand]+[13] @ShowImage[\GNMImages\Deck\a13\*.png] @Goto(Dealer)
(Win)
Meaning you win.. #DT
@NullResponse @ChangeVar[TempGold]=[TempGold]+[25] @If[TempGold]>=[500]Then(EndGold) @Goto(BlackJack)
(Lose)
Meaning you lose! #DT
@NullResponse @ChangeVar[TempGold]=[TempGold]-[50] @If[TempGold]<=[0]Then(EndPoor) @Goto(BlackJack)
(DealerWin)
Meaning I've won! #DT 
@NullResponse @ChangeVar[TempGold]=[TempGold]-[50] @If[TempGold]<=[0]Then(EndPoor) @Goto(BlackJack)
(DealerLost)
Meaning I've lost.. #DT
@NullResponse @ChangeVar[TempGold]=[TempGold]+[25] @If[TempGold]>=[500]Then(EndGold) @Goto(BlackJack)
(EndPoor)
You dont have any more gold to gamble with! #DT @DeleteFlag(Busy) @RapidCodeOff
Meaning that it is game over #GNMGrin #DT
Better luck next time! #DT
@NullResponse @RapidCodeOff
@End
(EndGold)
#SlaveName you've earned 500 gold #DT @DeleteFlag(Busy)  @RapidCodeOff
Which I honestly cant believe.. #DT
But a deal is a deal! #DT @ChangeVar[GNMGold]=[GNMGold]+[500]
I've transfered the gold #DT @SetVar[PDenialSet]=[0]
Well done.. #DT
Also.. #DT
I believe I owe you a bit of freedom as well #GNMGrin  #DT
@NullResponse @CallReturn(CR\GNMChastityOff.txt)
#GNMEmoteHappy #DT
@NullResponse @RapidCodeOff
@End
(StopTest)
@Variable[TempGold]<[200] @NullResponse @RapidCodeOff @Goto(Early)
#GNMGrin #DT @DeleteFlag(Busy) @RapidCodeOff
Stopping while ahead of the game #GNMLol #DT
I cant blame you..  #DT
Well I owe you @ShowVar[TempGold] gold #DT @ChangeVar[GNMGold]=[GNMGold]-[TempGold]
It has been transfered #DT
@NullResponse @RapidCodeOff
@End
(Early)
I told you that you could only stop the game if you reached 200 or more! #DT @CustomMode(ModeText, Normal) @DeleteFlag(Busy)
Stopping at @ShowVar[TempGold] isn't okay #DT #MeritChangeNHigh
We play by my rules or not at all #DT
@Flag(HasChastity) I'm increasing your time in the #Cage ! #DT
@NotFlag(HasChastity) I'm increasing your denial period! #DT
That should teach you a lesson! #DT @ChangeVar[PDenialSet]=[PDenialSet]+[24]
(End)
@NullResponse @RapidCodeOff
@End